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We like to publish interesting features from PET Users 
about their applications and set-ups. If you would like 
to contribute to the next Newsletter, please send your 
article, letter or comments to: 

The Editor, 

Pet Users Club, 

Commodore Systems, 

360 Euston Road, 

London, NWl 3BL. 

Please note: to provide a good information service to PET 
Users, we regularly mention equipment, software and services 
offered by companies and individuals not directly linked 
to Commodore. In doing so, we are not making recommendations 
and cannot be held responsible for the validity of any 
statements made. 



Commodore News 


With the. big announcement of several new products appearing 
last issue we are confined to a number of smaller but useful 
items of news this time. Incidentally we shall be reviewing 
in detail the new 2040 floppy disc next issue. One small 
point that should be noted is that while BASIC programs can 
be directly transfered from an 8K machine to one of the 
new 16K or 32K machines some PEEK/POKE statements and 
machine code routines will have to be re-located. More 
details of the necessary changes will be published later. 


REPLACEMENT KEYTOPS 


Some users have complained that the printing on their keytops 
has begun to wear off with use. Although the problem is not 
widespread and should not apply to machines purchased after 
1st September, 1978, we are making available sets of replace¬ 
ment keytops priced at £5.00 per set. If you can supply 
proof that your machine was purchased before 1/9/78 we will 
let you have a set for £1.00. Prices include VAT. To 
purchase a set send a cheque/postal order to Commodore 
(Euston Road) enclosing a stamped addressed envelope. 


EDGE CONNECTORS 


If you require edge connectors for any of the PET's Input/ 
Output ports ask your local dealer. He can order direct from 
us now. 


CIRCUIT DIAGRAMS 

In response to pleas from the more technically minded users 
for circuit diagrams we have decided to make a one-off special 
offer. This applies to PUC members ONLY and lasts only until 
stocks run out. Price for the complete set of 11 diagrams 
is £10.00 inc. VAT. Cash with order please. 


PET MANUAL 

A new manual has been printed for the PET and will shortly 
be available through your dealer priced at £5.00. It is 
written in a more understandable style and the presentation 
has been improved considerably. Included is a lot of additional 
information such as character codes, memory maps and interface 
specifications. 
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PTCWTCWAT. OF "PET USERS CLUB” MEMBERSHIP 


k.wSw r, s= s.rssn .%*;= » r- 

subscriptions to this newsletter. 

SSroSS Is t r Lid° anyon^who 6 j oins between^” 
SSse y ai“s S backdated to the last entry point, with 
appropriate back issues being sent. 

on JUNE 30th this year. 

WHETHER OR NOT YOU CHOOSE TO RE-SUBSCRIBE, YOU WILL RECEIVE 
ONE MORE ISSUE (NO. 7) IN MAY. 

If vou want to renew your membership please send a cheque for 
£10^00(or £15.00 for an overseas subscription) along with the 

completed form below to: 


The Pet Users Club, 
Commodore Systems, 
360 Euston Road, 
London, NWl 3BL. 


In order to avoid a discontinuity in receiving your newsletters, 
we must have received a payment for next year.' s subscnpti 
by 10th JUNE 1979 at the latest. 


PET USERS CLUB 
Membership Renewal Form 


Please renew my membership of the Official Pet Users 
Club for the period 1st JULY 1979 to 30th JUNE 1980 

I enclose a cheque/postal order number .* •*•*** 

to the amount of £10.00 (£15.00 for overseas subscrip¬ 
tions) made payable to:~ 

Commodore Business Machines UK Ltd. 

Name: . 


Address: 


_ A 








Editorial 


I have been fairly laden down over the past few weeks with 
readers' letters and clever programming tricks - regretably 
far more than I can publish in this issue. I am gratified 
to see that users are taking the trouble to write arid hence 
share their discoveries with other people. From the feed¬ 
back so far however, it seems that what readers find most 
useful and interesting are the reasonable length routines in 
a well documented article. 

So, if you have a routine that would be of obvious use to 
many other users (whether your application is in business, 
science or whatever) why not write it into a short article, 
giving details of where the routine fits into your application 
and other situations where it could be invaluable. If you 
want a good example of this look at Julian Allason's article. 


RICHARD PAWSON 
Editor - Pet Users Club 


* * * * * 


Overleaf you will find a questionnaire concerning the use of 
your PET, software, hardware and your opinion of this news¬ 
letter. Although we cannot expect everyone to return the 
completed form to us, the more we receive, the better will 
be our knowledge of what Pet Users really require in terms 
of programs, information etc. 

Although it will take us some time to assimilate and condense 
the replies, we will inform you of the most common answers 
and our proposed courses of action. 
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questionnaire for puc members 


Please answer the following questions and return it to 


The Editor, 

Pet Users Club, 
Commodore Systems, 
360 Euston Road, 
London, NWl 3BL. 


Q.l Where did you first hear of the Commodore PET? 
Computing press 

National press (inc TV) Please tick as 

From a PET dealer or appropriate 

in the showroom 
From a friend or colleague 


If possible before 
30th April 


Q.2 


What equipment do you have at the moment and what do 
you intend to purchase sometime in the future. 


NOW FUTURE 


PET 

Commodore printer 
Commodore floppy disc 
Other printer 
Other disc 
Expansion memory 


Q.3 Which of these categories most nearly describes your 
application? 

Business/administration 

Education 

Scientific/technical 
Personal/home use 


q. 4 More specifically, what do you use your PET for? 
(PLEASE BE BRIEF) 









In addition to our own need for good applications articles, 
we quite often receive requests from national journals asking 
for the address of a PET user with an application of specific 
interest to their own readers. 

If such a request arose for your application, would you be 
willing to talk/write to the appropriate person? 

YES NO 

If your answer is 'YES' please fill in your name, address and 
telephone number where you can be contacted overleaf. You 
can be assured that we will not give out this information 
other than to serious enquirers. 

SOFTWARE 


Q.5 Of the programs which you currently own and use on the 
PET, please give an indication of the sources: 

SOURCE NO. OF PROGRAMS 


Commodore Master List (either 
direct from us or through a dealer) 

PETSOFT 

Written by yourself or inside your 
company 

Others 

Q.6 Have you any comments about the standard of the programs 
you have purchased? 


Q.7 Have you any suggestions for new programs to be introduced 
into the Master List? Please give the 3 new titles you 
would most like to see. 


1 ) 

2 ) 

3) 


Q.8 PET USERS CLUB NEWSLETTER - which sections in this news¬ 
letter do you find particularly helpful and interesting? 


Commodore News 
Software 

Peripherals/attachments 
Applications 


"Printout" 
Programming 
Users directory and 
announcements 
Readers letters 
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Q.9 Which of the following possible sections would interest 
you most? 

Book reviews . . 

Specific user group section(business, education etc) 

Machine language section 

Q.10 Have you any comments or suggestions on how the news¬ 
letter could be improved? 


NAME : 
ADDRESS: 


TEL.NO.: 


- R - 










First a story: once upon a time a Software Manager received 
a phone call from a seeming whizz-kid - a macro library for 
the PET was mentioned and instant tailoring of business 
programs promised. A meeting was arranged - and a short 
program written in BASIC demonstrated and a promise to 
demonstrate a BASIC compiler three weeks later was made. 
Graham Harris of Costed Automation, I am still waiting - 
so are others, I gather . 


The first disc has arrived and it has got many interesting 
features. You can run your own machine code in the 
controller, eg. "BLOCK EXECUTE:"CH;D;T;S where D = DRIVE 
(0 or 1); T = TRACK (1 - 35); S = SECTOR (Number of sectors 
varies from 21 to 17 per track). 


Other direct access commands include: 

"BLOCK - ALLOCATE:"D;T;S 
"BLOCK - FREE:"D;T;S 
"BLOCK - READ:"CH;D;T;S 
"BLOCK - WRITE:"P;T;S 

"BUFFER - POINTER:"CH;PTR PTR * 0 to 255 

All commands may be abbreviated "B-F:" or "B-F" etc 

"B-A:" or "B-A" etc 

OPEN CN, DN, CH, "will open a channel to any available 
buffer. 

OPEN LN, DN, CH, "# 5 " will open a channel to buffer 5 where 
LN = logical file number. 

DN =*= device number. 

CH = channel number. 


Sequential commands are more familiar - 

0PEN14,8,5 "l:file Name, Seq, Write" opens a write channel. 
PRINT # 14 will then send characters to the disc. 

LOAD is used for programs and the directory. SAVE is also 
used. 


The commands include INITIALIZE, NEW, VERIFY, DUPLICATE, RENAME, 
CCPY and SCRATCH. Most reserved words may be abbreviated to a 
single letter, channel 15 is used for commands to the controller 
and for the extraction of error messages. 




n 4-n anv of you who have had experience of difficu- 

Lastly, a plea to any n -, r 4 - icu i a r the effect of sup- 

lties with expansion RAM ^ which is assigned from an INPUT 
ressing the leading c a «444 and 8190.^ Also in Chaining, 

statement if located ^tween 8444^^819^ (using 

characterize what is happeni g n ass strings and anyone 

load as a last pouted statement) Xch maj bl due to garbage 
who has experienced gross ettecw wiu ; 

collection during the reassignment g 


Also 

long 


with PME memory expansion has 
machine code loops that sit m 


anyone had problems with 
the expansion memory. 


NICK GREEN 
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Master Library Re-packagirig and Additions 


We have now decided to change our policy regarding games. 

It is our intention to produce games packages of four or 
five games per cassette withdrawing games sold as one program 
per cassette. These will sell @ £10.00 each for Master Library 
packages and @ £5*00 each for Common Library packages. 

This issue will cover Master Library releases and the next 
issue will cover Common Library releases, each being effective 
on the publication date of each issue. 


The following games are to be re-packaged: 


MP032 

- Backgammon 

This will be included in Treasure 
Trove of Games 6 

MP010 

- Othello 

This will be included in 

Treasure Trove of Games 5 

MP011 

- Pontoon 

This will be replaced by an 
improved game called Blackjack 
and is included in Treasure 

Trove of Games 4 

MP012 

- Wrap Trap 

This will be included in Treasure 
Trove of Games 3 

MP013 

- Noughts and Crosses 

This will be replaced with 3D TIC 

TAC TOE in Treasure Trove of Games 1 

MP014 

- Rotate 

This will be included in Treasure 
Trove of Games 1 

MP015 

- Lunar Lander 

This will be replaced by a much 
improved version called OSC Lunar 
Lander in Treasure Trove of Games 1 

MP016 

- Biorhythms 

This will be a £5.00 pack to be 
released with Diet Planner. 

MP017 

- Target Pong 

This will be included in Treasure 
Trove of Games 2 

MP017 

- Off the Wall 

This will be included in Treasure 
Trove of Games 3 

MP018 

- Galaxy Games 

This will be included in Treasure 
Trove of Games 2 

MP019 

- Space Fight 

This will be inlcuded in Treasure 
Trove of Games 4 

MP020 

- Draw Poker 

This will be included in Treasure 
Trove of Games 2 

Note: 

No new orders for the above games will be accepted but any 
outstanding orders will be fulfilled. 


11 



new RELEASES Warning 


- these games are addictive! 


Commodore Treasure Trove of Games 


£10 Order No MP0 40 


n nr. Lunar Lander - one of the all time popular favourites^ 
you must make the Lunar Excursion Module land softly on the 
moon By regulating the falling speed, the counter-thrust of 
r hp rockets and the amount of fuel required, you should be a* 51 ® 
to accomplish this objective. If you fail, the Eiar ^® 1 °^ ^ap 1CS 
will show the Lunar Lander smashing to the surface of the moon. 
Difficult at first, but fun to master. 


Rotate - is a puzzle on a 4 x 4 grid, 
the letters in sequence in as few moves 
at first. But it can be done. 


The secret is to arrange 
as possible. Very tough 


Wumous - is a delightful voyage in the imagination, full of fun 
Halite Iducational too. You’re required to be a detective on 
a treasure hunt. The clues are all given and you must find the 
Wumpus, on the basis of these clues, and get him before he gets 

you. 


3D Tic Tac Toe - See if you can beat your PET at this old reliable 
game. 


Commodore Treasure Trove of Games 2 £10 Order No MP0 41 

Jumbo Jet Lander - an exciting aircraft landing simulation in^ 
which you the pilot, are invited to land a Jumbo Jet using rate 
of descent/thrust changes - good graphics. 

Tarcret Pong - Insert paddles in the path of a fast moving ball to 
deflect the ball into a target. The secret is to use the fewest 
number of paddles and the least time to hit the target just once. 
It's really much more difficult than it sounds. It requires 
dexterity and guarantees you fun. 


Draw Poker - perhaps we've been minimizing the quality of^the 
superb graphics available in all these programs. But with 
Draw Poker you have a perfect example of the kind of graphics we re 
talking about. Here you play Draw Poker against the house 
with two pair or better to win. And we must give you a warning, 
the house is a very tough-but-fair-dealer. Of course, the house 
is your PET. You can vary your bet and see how much you can win 
(or lose) . 


Galaxy Games - here are two tough but entertaining games.^ Both 
require you to manoeuvre your spaceship while firing at the enemy, 
and at the same time, to avoid hitting a star. In one game, 
you're firing at a spaceship that's being piloted by an obviously 
drunk astronaut! Absolutely no accounting for the gyrations the 
enemy spaceship is going to take. 
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Commodore Treasure Trove of Games 3 £10 Order No MP042 

Concord Lander - a superb game for simulation buffs. You 
being the pilot of a Concord landing - in real time - your 
aircraft on a runway with facilities to droop the snoot, 
lower the undercarriage, full joystick control (using keypad) 
and full thrust controls. 

Off the Wall - This is the exact opposite to Target Pong. 

Wrap Trap - dynamic graphics game in which the player has to 
trap the computer. Good arcade quality graphics. 

Spacetrek - this is the PET version of the familiar game many 
computer enthusiasts know as Startrek. It consists of two 
programs. The first is a program that makes good use of graphics 
to give instructions and the second is the game. 

Commodore Treasure Trove of Games 4 £10 Order No MP043 

(8K PET only) 

Super 9x9 - a machine code 9x9 noughts and crosses game that 
employs full and superb use of PET's graphics with 6 levels of 
play and complete instructions. 

Formula I - another good game for 1 to 4 players. You can select 
up to 4 different tracks and race against your fr-iends - nice 
graphics in this one too. 

Blackjack - place your bet and watch your PET deal out the cards 
as you try to beat the house. Superb graphics on a very enter¬ 
taining game. 

Space Talk and Space Fight - fire missiles at each other in this 
two player game. But there's a warning: each missile has 
limited range and if the missile doesn't hit the enemy, watch 

out! You could run into your own missile and lose . 

and feel very silly. A game for all ages with emphasis on the 
younger people. 

Commodore Treasure Trove of Games 5 £10 Order No MP044 

Glider - a superb simulation of a radio controlled glider, you 
have control over direction and can employ the use of a randomly 
wandering Thermal to help you land in the landing area. 

Awari - PET version of the popular ancient African game using 
nice graphics. 

Othello - Othello is a game of strategy played on an 8 x 8 board, 
much like a chess board. The object is to surround your enemy and 
convert the enemy pieces to your side. It's a game where the last 
moves can be quite decisive. You play against the PET brain. 

Reverse - is another game to tax your intelligence and logic. The 
numbers 1 through to 9 are on the screen in random sequence. The 
idea is to put these numbers into order in as few moves as possible. 
Your logical thinking will get quite a work-out. 
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Co mmodore Treasure Trove of Gaines _6 


£10 Order No MP045 


introductory instructions included. 

Polaris - you are the captain of a nuclear submari 

destroyers will seek you out and depth 

charge you. 

Crypto - a Commodore version of the hi 9jj ly Should 

Maste rmind employing PET’s graphics very well. This shou 

keep you in hours of fun. 

Life - a machine code version of Conwayb famous game of Life 
Tncluding the the rules and instructions to start. 

commodore Diet Planner and Biorhythm £5 Order No MP016 

Planner determines the ideal weight for your height, your 
H- e sex^ ^fnd body 10 frame. Should you wish to lose weight, your 
PET'will display the calorie intake required for you to reach 

your goal. 

Biorhvthm - will indicate your intellectual, emotional and 
physica l - cycles according to a well regarded series of compu¬ 
tations based on behaviour. 


The Commodore Educational Pack 1 


£10 Order No MP046 


Helmholtz Coils - a pair of Helmholtz coils are used with_an 
electron beam tube to bend the electron beam into a circle, 
providing that the B field is known this allows one to calculate 
e/m for the electron. This is quickly demonstrated in this 
program by use of the PET graphics up to a separation of 19cm. 

Random Decav - simulates a decay process using random numbers. 

The program^plots both linear and log-linear graphs. The latter 
tending more to a straight line as larger numbers are generated. 

SchrOdinger - the program treats Schrftdinger's method as a 
simulation where the student has to find the correct value of 
E (to at least 6 places of decimal). The answers are given as 
a REM statement at the end of the program. 

Momentum 1 and 2 - two tutorials on momentum conversation 
followed by user-chosen simulated collisions in the first program, 
and unrestricted choices for the variables of mass and velocity 
but displaying only one result at a time in the second. 
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Commodore Linear Circuit Analysis 


£10 Order No MP047 


The principles of ac circuits can be used to find the currents 
in any network. However, solving the dirrerential equation 
pertaining to each network of most practical circuits is often 
cumbersome. More powerful techniques of ac circuit analysis 
permit solutions for the circuit currents with much less labour. 
These techniques are, or course, based on the same differential 
equation of the circuit. The procedures are written in two 
programs for linear passive circuit analysis and linear 
electronic analysis. 

Commodore Mechanics of Materials £15 Order No MP048 

The set of programs present the analysis of materials. The 
fundamental principles of the subject are emphasized throughout. 
Applications are selected from the various fields of engineering. 
The topics include statics, stress and strain, beams and framed 
structures, reinforced concrete and design of steel columns and 
bolts. Illustrative examples are given to show how to set up 
a problem and to explain the solution. 

Commodore Linear Programming £5 Order No MP049 

The use of graphs to solve linear programming problems is 
limited to those with only two unknowns. If, for example, 
there were four variables in a linear programming problem, 
graphical methods would be of no use. Fortunately, there 
are algebraic methods for solving linear programming problems 
and these algebraic methods lend themselves to computer programs. 
A BASIC program with the corresponding algebraic methods is 
presented to solve linear programming problems. 

Numerical Analysis £15 Order No MP050 

The solution of differential equations - many problems in 
engineering and science can be formulated in terms of differ¬ 
ential equations. Today computers are used extensively to 
solve the equations of artificial-satellite theory, electrical 
networks, bending of beams, stability of aircraft and others. 

The Runge-Kutta methods attempt to obtain accuracy and at the 
same time avoid the need for high derivatives, by evaluating 
the function at selected points on each interval. However, local 
error estimates are difficult to obtain. 

+ 

The solution of non-linear equations - one of the most frequently 
occurring problems in scientific work is to find the roots of 
equations of the form f(x) may be known only implicity. 

In general, it is possible to obtain an appropriate solution, 
relying on some computational technique to produce the approxi¬ 
mation. This program produces an interactive method for finding 
approximations to isolated roots of a function. 

The method is known as bisection. 
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£25 


Order No MP021 


Payroll 

4 -v,o-t- TJWT nodes D and E are now imple- 
Users may care to note tha criticisms have been implemented 

mented and many of your helpful criticisms n that no tax 

to improve the quality of the dialogue, 
tables are required with this program. * * 

It is our policy to keep all our software from 

versions of all our leading prog 4-hat have been suggested. 

32 to time incorporating imptovements^that havener., * 

All programs with fatal i° 9 toa airect , with a description 

replaced free of charge if retu Euston Roa a. For speed 

°ol replacemen^whei^physical loading problems are encountered, 

please return to our factory at Eaglescliffe. 

users with a statistical requirement may car*.to note that = st 
many of the titles that we have unde f ^llwiSg publication 

of oSTnext^ssue? Sle2e do not place any orders with us until 
release has been announced. 

expected to occur. 

rme-Factor Ana lysis of Variance " 

S'SSSS’tSTSxS ISScStSTof actual differences among the 
corresponding population means. R 

The ensuing calculations are laid out conveniently in the AHOVA 
table. 

Two-Facto r Analysis o£ testin^th^row^ffects and 

column C effects e independently. ^is is the two-factor analysis 
of variance. The program assumes:- 

1 one observation per cell , effects - the so-called 

2 no interaction between row and column eitecrs 

simple additive model. 

sion^ of^slmpl^regr essio n T itto ^ 

independent variable X. ...,m this 

For a set of data points (Xi, ' ' 

program fits a linear equation of the form 

Z = a+bx+cy 


by the least square method. 

multlple e app S ll°ati^ a iFtn e" iSo^ory^d^nlul?^ S?^rfo2. 
and displays instantly regression on the line. 
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As promised last issue we are printing reviews of several 
programs available from the newly formed Educational Common 
Library. Christopher Smith from Queen Elizabeth College, London, 
is a leading exponent of low cost educational software - 
especially on the PET. He has given us his opinions on the first 
few programs and in passing these on, we hope to give you some 
idea of their range. 

Millikan Cell - allows you to run your own experiments, timing 
the fall of oil droplets under the influence of a chosen 
electric field so as to calculate the electric charge on the 
droplets. Nice graphics and can certainly be used in a 
'practical' class. Would be improved if the equations used 
in calculating charge were shown on the screen - perhaps with 
the values appearing in their right place. Does not prevent 
division by zero errors. 

Random Decay - models radioactive decay by throwing a user- 
chosen number of dice and progressively removing all sixes. 

Gives either linear or log plot of this decay and a table. 

Rather limited: why not extend it to show e.g. rate constant 
and half decay time ( few students seem to be able to cross¬ 
convert these) and perhaps also show square root (n) as a 
measure of error. 

Molecular diffusion - fine animation of Brownian motion allow¬ 
ing choice of number of steps and a numerical readout of these. 
Excellent basis of a CAL practical but does not guide the student 
in analysing the data. 

Helmholtz - Plots, and gives option of the data, the magnetic 
field along the axis of a pair of Helmholtz coils. You choose 
details of the coil size and current etc. to provide genuine CAL 
opportunities. The plot is rather slow (inefficient nesting of 
loops). Well worthwhile for its specific task. 

Schroedinger - Rather complex demonstration of the need for a 
whole number of wavelengths to obtain a valid atomic energy 
state. Would be much helped by graphics and a reminder table 
of your previous entries and of recommended values. 

Hangman - perhaps educational in that it might keep them off 
the streets: at least it doesn't have, as I've seen elsewhere, 
bloc dripping from the gallows. 

Momentum - provides numeric solution for the impact of two 
balls of ,chosen restitution and velocity, together with a 
linear-style tutorial on the subject. Surely this topic just 
asks for bouncing graphics? Again it would be nice to tabulate 
the equations and show their step-wise solution. 

Maths (Clark )- a series of programs giving numeric solutions to 

a) a pair of up to 12 x 12 matrices (sum, product, inverse etc.); 

b) vectors, including vector angles; c) trig; and d) integration 
(trapezium and Simpson's method). Very useful set of programs for 
both CAL and functional use. 
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rh,«q. Farmer - a competition game between ^ojoffeejarmers. 
Good idea but, like snakes an ' slnce the probabilities 

S°i£ “?fan S m SS variable' (by rewriting program’ lines) the 
program^couId be adapted to make a good project. 

Rase conversions - interchanges integers of any base (range 2 
4-n that ~f any other base. Designed, presumably for 

SSUSSToSSt 00 |e2 Y xim£int|er - 
words) . 

HHSi; provides lltl ^veS^rthwhSf^L^in^t^ingio ^ 

iSefwort. Ch lSrof C Sfci O lculaS?oL W a£aSaSn |^ t (20 s) 
slow; it must be possible to do some optimising 
routines too! 

experiment h and S you would neSd the associated book to make full 
use of it. 

Karnaugh mapping (Harr^) - excellent trut^table-alysis^of 

y ®*' 3s “he d^scSpw” introduction is a seperate program 
whose 6 last function is to load and run the main program a nice 
touch. 

CHRISTOPHER SMITH, 

Queen Elizabeth College, 
Campden Hill Road, 

London W8 7AH. 


still on the educational theme here is a report on the present 
a^ite of Chelsea Science Simulation Project programs suitable 
for the PET. Some people have responded to the request for 
help in converting ?hese programs but more are needed - hence 
the plea at the end of Bob Lewis' article. 



CAL MATERIALS AVAILABLE FROM CHELSEA COLLEGE 

Many readers will know of the CAL projects based at the Centre 
for Science Education at Chelsea. These take the form of units 
of teaching/learning materials aimed to assist students in 
learning about topics in their normal curriculae. They encourage 
active learning approaches to the sciences, economics and 
geography and are intended to complement rather than replace 
traditional resources. Specifically they do not attempt to replace 
perfectly valid laboratory or field work. The programs are 
written in BASIC but require no knowledge of either BASIC or 
computing on the part of either the teachers or the students 
using them. The interaction with the programs is through a 
plain English dialogue. 

The units comprise three important items: 

- students notes or leaflets 

- a teachers guide 

- one or more computer programs and documentation 

The first two items are published by Edward Arnold (Publishers)Ltd* 
and the programs are made available through the Educational Computing 
Section, at Chelsea. 

Recently many requests for the programs have come from users of 
PET micro-computers. Originally the programs were distributed 
on paper tape but this is not a form suitable for most PET users. 

In collaboration with Commodore we are pleased to be able to 
announce the gradual availability of the software on cassette tape 
adapted specially to run on PETs. 

All units have been written by teachers of the appropriate discipline 
and have been tried out in schools prior to publication. The three 
components of each unit are interdependent and so it has not been 
our policy to release programs without the printed documents. Each 
publication when purchased from Edward Arnold contains a form 
requesting a copy of the appropriate program(s). Programs are 
only supplied on receipt of these forms. The cost of each unit 
has been kept as low as possible by using paper tape as the medium 
for supplying the programs in machine readable form. Listings are 
available as an alternative . We are now in the process of building 
up a complete library on cassette tape but it will be necessary 
to make a small charge to cover the higher cost of cassettes. 

This amount must be sent with any program requests, to keep over¬ 
head costs down. 

Materials from the two projects are currently available from the 
publisher and it is hoped that PET tapes will be made available 
for all these in the next few months. 

* inspection copies are available from Edward Arnold (Pubs) Ltd., 

Woodlands Park Avenue, 
Woodlands Park, 

Maidenhead, Berks SL6 5BS. 


19 



CHELSEA SCIENCE SIMULATION PROJECT 


* 

* 


SP 

001 

LNKOVR - unit 

on 

SP 

002 

ENZKIN - unit 

on 

SP 

003 

EVOLUT - unit 

on 

SP 

004 

CMPETE - unit 

on 

SP 

005 

COXIST - unit 

on 

SP 

006 

RKINET - unit 

on 

SP 

007 

HABER - unit 

on 

SP 

008 

NEWTON - unit 

on 

SP 

009 

INTERP - unit on 
waves 

SP 

010 

SCATTER - unit 

on 

Cost of 

cassette for each prog 


qrHPOLS COUNCIL PROJECT 'COMPUTERS IN THE CURRICULUM' 


CC 001 


CC 002 


CC 003 


CC 004 


CC 005 


BIOLOGY — units on human energy requirements; pon 
ecology; inheritance; statistics; 
transpiration; Predator-prey relationships, 
countercurrent systems. 

PHYSICS - units on capacitor discharge; photoelectric 

effect; gaseous diffusion; mass spectrometer; 
radioactive decay; planetary motion; 
gravitational fields. 

ECONOMICS - units on international trade; multiplier; 

fiscal policy; elasticity of demand; 
price fluctuations; price stabilisation; 
theory of the firm; banking; monetary 
policy. 

CHEMISTRY - units on chemical equilibrium; rates of 
reaction; gas chromatography; electro¬ 
chemical cells; lattice energy; element 
gas; contact process. 

GEOGRAPHY - units on human population growth; joint- 
stock trading game; South Eastern railway 
game; statistics. 


Cost of cassettes for each suite of programs to be announced. 


Requests for all this software must be made on the forms 
contained in the packs of written material indicating that 
a PET tape is required to the address at Chelsea indicated 
on the forms. A cheque or postal order payable to Chelsea 
College must be enclosed. 


* available now 



A REQUEST FOR HELP 


As you will have read elseqwhere in this Newsletter, we are 
trying to make cassette tapes available to PET users for a 
range of CAL programs from the CHELSEA SCIENCE SIMULATION 
PROJECT and from the COMPUTERS IN THE CURRICULUM PROJECT. 

Many of you will already have the materials and programs and 
we want others to benefit from your work. This is not a 
small job and we wish to make the programs available to 
users as cheaply as possible. However, many hands make 
light work and perhaps you can help! As with most worthwhile 
tasks, the rewards are small - an acknowledgement in the 
program that this is your implementation and, as with 
contributors to the PET Common Library, a choice of four programs 
tape from the Common Library or the CSSP or CC Libraries. 

The job is easily defined - to load the existing programs on to 
your PET and to send a copy of the program on tape to Commodore 
with a short note on how you implemented it, for example, 
what changes you were forced to make. You will be sent quite 
strict guidelines which are intended to insure that your 
implementation is acceptable to us. It is strongly recommended 
that you tackle just one program at first and once your style 
is accepted, you can go ahead with more confidence. 

To ensure that everyone does not work on the same program, it 
will be necessary for you to send a note of programs you are 
prepared to work on to Commodore. In return you will get 
a request to go ahead with one (later more) specific programs 
and a copy of the guidelines I have mentioned. We are looking 
for high quality programs - efficient, well presented and 
reliable. Write to us soon, as I know that many people are 
already getting on with the job. I do hope that you can help 
us - many thanks in advance. 


on 


BOB LEWIS 



„ • rAvailable from PETSOFT and most 

CONNECTICUT WORD PROCESSOR. A eview dealers £25 inc VAT) 


-j-u e pet have been circulating in the 
Several text editing P r °® r ™ merited being described as a 

u K and, to date, none of them has re* y 

Word Processor. 

-—r’“- 

Written by Richard Rcsner oi the Amer powerful 

Connecticut Microcomputer, the program turn^ any RS232C 

text processing system. Originally written to » 

v . ATtA-i onnc tvvv-488 adaptor which costs tyo, 

printer through their which allows the program to 

PETSOFT have now produced a secon P combination, 

be used with almost any existing inter!ace/pnn 

The program can be used for preparing, editing and ^ W ^“ lple 

copies of letters, articles, contracts and so o^ start^y ^ 

entering the text in upper and lower case 
edited and formatted for final printing. 

:t in( ,t over 2,000 characters of 

After the routine is loaded there 3 

memory free on the standard 8K PET; this is plenty for a P 

"Tetter, but more memory may be needed for lengthier documents. 
Alternatively, the text file can be saved and reloaded. 

The comprehensive input and editing features aiiow you to type in 
text delete lines, insert lines between existing lines, carry out 
substitutions within a line, or replace one line with pother 
block of lines can also be moved from one place to anothe 

Script Directives allow you to vary the output format by getting left 
and right margins. For example the left margin can be altered for 

indentation. 

• form Of a well written 32 page manual which 

Documentation comes in the form ot a wen 

do . a onecial section covers each 

guides you through the procedure. P 

directive in detail. Sample runs are also provided. 

The program itself is well thought-out and considerably extends the 
range of PET applications. It is interesting to note t a 
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American 'PET User Notes' is composed using this routine. My only 
criticism concerns the absence of right hand margin justification. 
PETSOFT say that they will be releasing a disk-based version which 
will include this feature. 

If you have a printer, you should definitely have this program. 


NIGEL WEST 



” printout" 


1. A .SUBROUTINE LIBRARY. 

I copy every useful routine I avoids errors when 

ass srssi- h sec? n s T ° sl ~ : *» «. 

'Templeton' merge, dc ’ r ' r |_ long routines, and makes 

error-prone business of keying d ^ rout ine library an 

the compilation of an. ina SJ® h r not you use the merge, I 
attractive proposition. Aether or n ubrary of 

strongly recommend t.iat you creux-e 
your favourite routines. 


jj i. „ra-iT- lihrarv here are some which have proved 
To add to your library , * , i,. nr’o the merge 

e S fficien 0 tly:-an T d h :rf 0 bes e t r k 0 e^d in direAly from your 
notebook. 


1.1 Right Align. 

This is intended mainly for cash columns liven a valu^to 

two places of decimals in Z. then « <® r S“^, earing as a 
vrith the value aligned to tne right, zeru vv 

single nought. 

55000 REN-CASH RIGHT ALIGN 

55010 Z$=LEFT$(RIGHT?(" "+ , 

STR$ (Z+.005*SGN(Z) ),10),9): RETURN 


1.2 Input Trap 

„ a null return and with commas 

This INPUT routine copes with a null re uses 

- ^delete 

after the INPUT question mark. 

Ill™ ^5U:POK« P 2 ;;;4 = POKE528,34 = POKE529,20 = 
INPUTA$: A=VAL(A$): RETURN 


1.3 Detect SHIFT key up or down. 

Adapted from a routine shown me by Andrew Lister working at 
the^llanchester College Of Higher Education, this is a "eat 
way of getting two operations out of one key, one when it 

down and another when it's up. 


55200 REM-DETECT SHIFT KEY 

55210 WAIT516,1: GOSUB 1000: 
RETURN 


ONLY- 

WAIT516,1,1: 


GOSUB2000: 
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1.4 Branch on 'random' key. 

t use this when the program waits for one of many possible 
single key responses. It saves line after line of 
IF.THEN statements. 

55300 REM-COMMAND DECODE- 

55310 Z$="FPLBCTKAcilmtsrO": REM FOR EXAMPLE 

55320 WAIT525,1:GETC$:F0RI=1T0LEN(Z$):Q$=MID$(Z$,I,1) 

55330 IFO$=C$THEN55350 

55340 NEXT:G0T055320:REM INVALID RESPONSE 
55350 ONIGOTOIOOO,2000,3000,4000,5000, 
6000,7000,8000,9000,10000 

55360 1=1-1OsONIGOTOllO00,12000,13000,14000,15000,16000 


1.5 Center up text 

For a printer opened as file 1 with a line length of X and 
no TAB facility. 

50500 REM-CENTER UP PRINT LINE- 

55010 FORZ=(X-LEN(Z$))/2T01STEP-1:IFZC1THEN550? 

55020 PRINT#1," ";:NEXT 
55030 PRINT#1,Z$:RETURN 


1.6 Playing card shuffle 

Dr A.K. Jobbings wrote to me from BRADFORD , 
with this very neat shuffle. 

50600 REM-CARD SHUFFLE- 

50610 S$="":P$="*AsKs...2sAhKh...2h 

50620 P$=P$+"AdKd.2dAcKc_2c 

50630 FORA=52TOlSTEP—1:B=INT(RND(TI)*A)+1 
50640 S$=S$+MID$(P$,2*B,2):P$=LEFT$(P2,2*B-1) 
+MID$(P$,2*B+2):NEXT 

50650 FGRA=0TO51:C$(A)=MID$(S$,A*2+1,2):NEXT 


O.K., I've shown you mine, now you show me yours! I will 
include as many as I can in this column. 


2 . Text nrocessor developments. 

Now adapted for the IEEE bus, this has been supplied to 
several interested users. Run-Time formatting parameters 
are now text-e.bedded commands. Price and ordering details 
as before. It has been used successfully on the SWTP PR40, 
the AXIOM 801 and the TELETYPE 43. This time, the column 
was edited and printed using the Golf-ball/lEEE interface 
from G.R. Electronics which I mentioned last time. Nice 
one, Cliff and Doug! 
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3. COMPETITION 1 RESULTS. 

dearly 50 entries ,ere received for the 

Mo two solutions tackled tne problem 1 c ^ ectly . well 

way. Only 4 entries your solution 

done! Many of you indicated bow many ®£ e =J° ies on the 

occupied, before being ™- 3 programmes, using a common 

number of Bytes needed to run the pr g^ ^ case , PRINT 

were 3 included, I -f ^m =ut and iso The 

winning G entry and^the'^runners^up^needed^o^modif ication, 
however. 

Some of you adopted a straight *°-« d ay !^ h ' u I??xefti?h 
out the various ranges for the four day numner^^ ^ ^ 
IF....THEN statements. Typically, tnes 
300 to 500 Bytes. 

The shorter routines used a combination of string 

manipulation and evolutions of Brown, of 

^B^poi^RoSdfsSrbSr^L^ the first entries 
received, it wins the competition. 

3 d$=MID$(" JanFebMarAprMayJunJulAugSepOctNovDec", 

M* 3,3)+STR$(D) 


9 M=VAL(RIGHT$(D$,1)) :D$=D$+MID$("thstndrd 1 , 

(D-MO10) * (M<4) *2*M+1,2) +STR$(Y) 

Ian's solution occupies 123 Bytes and runs in 169 Bytes. 
dp«?trovs the original value in M, but the problem didn t 
forbid Y that. (Ian submitted another version running m 
another 7 Bytes in case it did!) 


It 


ThP runners up were David Abrahamsom of the Department of 

^n-Le^^grr- 

would have run in 163 Bytes. 

10 D$=MID$( "JanFebMarAprMayJunJulAugSepOctNovDec", 

3*M-2,3)+STR$(D) a 

20 A=VAL(RIGHT?(D$,l)):D$=D$+MID$( thstndrd , 

1-2*A*(D<4ORD>20ANDA<4),2)+STR$(Y) 
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4. COMPETITION No 2. "Long String" 


Searching for a sub-string within a string is not too hard, 
provided the string is held in one element of an array. If 
the string stretches across several elements however, things 
get tricky! 


A string of 1020 characters is held in A$(0) to A$(3). A 
sub-string is held in S$. Write a BASIC program to find 
matches for S$ within the long string and display their 
locations in the following format for each match. 

Element No,Chr No within element for 1st chr of match. 

You may assume the strings do not contain quote marks. Your 
solution must cater for matches 'across the joins' between 
two elements. 


The entry which processes my test string and sub-string 
correctly, IN THE SHORTEST TIME, will win. The prize is a 
£10.00 voucher for Commodore software. The closing date is 
three weeks after the official publication date of this 
news-letter. 


With your entry, include the number of jiffies taken to 
search (unsuccessfully) for matches of a 10 chr substring. 
You may use line 1 to pre-locate variables etc. The rest of 
your program must lie in line 1000 onwards. 


Thanks for your letters, ideas, encouragement and 
criticisms. Keep them coming! 


Mike Gross-Niklaus, 
25 Longdown Road, 
Congleton,Che shire. 
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Book Review 


"Programming the 6502" by Rodney Sake, published by SYBE * 

For many years our own ”° SY ®f"°g°rd bfdigital 1 engineers and 

and peripheral chips. Howeve , nnblisher was that 

appeared^ the basic “^ron °f ‘he g^aSeady familiar 

if tSlSSSSaS^ tMS of microprocessor design and 

implementation. rules 

The massive new interest £g*th 1 ^ 11111^1 ^ passed 
have changed somewhat durg The launch ing of the hard 

since MOS Manuals first *PP ea *®liowed by PET itself introduced 
ware development board: KIM, learn to program the 6502 micro- 
Tnew type of user anxious ^ 1 ^^ who starting 

processor at machine code ^voerience, have successfully used 

££rSs Ss 

for learning machine code. 

Until now I have ^--^^ 00 ^^ by Ad^oSl^e 
trilogy: "An Introduction to Micro f fundamental 

as providing the best tutorial • ? But although 

concepts prior to tackling the Mosman t±on of the general 

Osborne's book is ® xce ^®^ demand by users of systems 
principles, there is clearly a .„®£orv level text dealing 
based on the 6502 for an. intr °JS°S Now this missing book 

sp!?Ifi=ally «^h this microprocessor ln the U.K. 

has been written by Rodney Zaks, ana 

"Programming the 6 ? 02 "t^^hroug^the 1 jungle^Fcomputer 
takes the reader, ^Jf^^rettion of an algorithm, 

iargon. Basic concepts such aa : . octal and hexidecimal 

flowcharting, b ^ nar Y v r ®^i| ine d. The same thorough approach 
notations are clearly P book dealing with 6502 hard- 

continues with, ^aiSTbasic programming techniques - 

ware organisation and basic P c&n move on to reading the 

Sardware°f d%?ogrUing manuals with no further assist- 

anc®. . , 

A special section is 

monitor SSJgS S^SES! - ^ir heme or 

office security system. 



Another section gives and explains typical machine code application 
programs such as getting a character from a keyboard, clearing a 
portion of memory and finding the largest element of a table 
(machine code subroutines for sorting can slice minutes off from 
the execution time of Basic programs.) 

The concluding chapters of the book look at the general principles 
of data structure organisation and program development and serve 
as an excellent introduction to the more specific books that are 
available. 

All in all this book is a worthwhile investment for anyone 
contemplating getting involved with machine code on their PET. 

As a special Users Club offer we have bought 100 (only 100, 
which will be available on a first come first served basis) 
copies of the book from Sybex which we are making available 
at £6.50 from the Euston Road Pet Centre. (add 25 pence for 
postage and packing if ordering by post.) 

A special pack containing the MOS. manuals plus "Programming 
the 6502" is available for £16 (add 40 pence for postage and 
packing if ordering by post.) 


ANDREW GOLTZ 


EMPLOYMENT OPPORTUNITIES 

Commodore Systems is growing rapidly and interesting opport¬ 
unities are frequently occurring. If you would be interested 
in working in a challenging and exciting environment please 
write to us in confidence with your curriculum vitae. Particular 
areas where we foresee future needs are: 

Sales Department (e.g. in our Pet Centre) 

Service Engineers 

Training Manager 

Technical Sales Support 

Software Library Organisers 

Sales Promotion and Marketing Support 

Secretaries 
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Applications 


I make no apologies for choosing^a thf control^ stepping 

rtoinrnof ^c^onest^je o* g.* it^ 

recently by a sur P ri ®^^. s ar ticle demonstrates that it w 
possible. Mr - ® ob ® rbS °?,J the software side of the control 
not only possible but tha use pet’s versatile 

is very neat. It puts t Y | ontro n er . Mr. Robertson, 

language and the powerf Holland to England, also sent 

who has recently ^ which he uses to program EPROM s 

me details of the software which n tQ consu it hrm 

SteTuirc-contarhir^fpKS Besiks Ltd. 

ntriUADn PAW! 


TBCT 488 st epping motor interface 

introduction 

With the advent inexpensive processing, control^ystems^^ 

areat intelligence are possible. ,®its for all manner of 

communication with m J^oi Pe however , until now the bus lacked 
supervisions and contro . , The step ping motor 

"S^Sbefwi?" “Si- added thUS ° Penin9 

up a whole new area of control. 

The reason for the choice of stepping :™° b °£e r * S b eing P partic- 
was due to PKS Designs Ltd , the^ ^ stepping moto r, being 

fUlltlT ^maShSefis well suited to digital control. 

The stepping motor and drive combination h^^ units are capa- 
few years progressed a geat deal. an / shaft speeds of 
ble of powers in the order or f from the small 

3000 RPM at 1000 steps/rev. This is a rar y 

units used in floppy discs. 

OPERATION 

SSriri°com^erby“ht I^erftceVgi^S Sde^ount 

at a given rate as follows: 


1. 

2 . 

3. 

4. 

5. 

6 . 


a space or 


The device address, specifying.the in-deface 
?£e “is letter (X,Y ,Z) . Defining the axis 
The sign or motion direction. Positive sign 

nothing gives Positive to 6 numeric characters defin- 

The move data, consist: o-t-pos 

ing the incremental move in to’ describe feedrate data 

An ASCII Used as the jharacter ^to characters 

specify ing" velocity Multiples of 10 steps/secs. 
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A basic control statement may look like this:- 
10 PRINT & 5, "X-2001 @ 102" 

This would produce a move of 2001 steps of the X axis motor 
in the negative direction at a feedrate of 1020 steps/sec. 

Having specified a feedrate (@102) subsequent moves will also 
be at that rate unless another "X@" statement is given. Also 
an "@" statement may be given during an axis move to change the 
velocity without affecting the move distance. 

The axis letter (X,Y,Z) defines one of three multiplexed out¬ 
puts. If a simultaneous system is required seperate interfaces 
for each axis drive would be needed. 

The IFC control line resets the interface and if it is wished to 
abhort an index controlling the IFC line will give that function. 

PROGRAMMING 

A basic print statement has already been given which will 
initiate a move. However, how do we know if the move is 
complete? In the present hardwired interfaces this information 
is given by the SRQ line being low during index and going high 
on completion. The positive edge produced may be flaged inside 
the PET and tested by the program as follows:- 

1060 W=peek (59426) : poke 59427, 62 
1065 Print#5, "X-2001@102" 

1070 if (peek(59427) and 128) = 0 goto 1070 

Line 1060 clears the flag by reading the port and then the inter- 
upt enable is poked for a positive transition. The move is then 
programmed in 1065, 1070 tests to see if a positive SRQ transition 
has occured before program continuation. Line 1070 may be placed 
some time later if computation is required during the move time. 

As long as no further print's except "@" occures before line 1070 
no information will be lost. Some may notice that the SRQ destination 
is not as described in the handbook, the values above are correct. 

The interupt flag used here could of course produce a system inter- 
upt if necessary, a machine code program for that is being contem¬ 
plated. 

FUTURE DEVELOPMENTS 

The hardwired system is at present being implemented with an 8048. 

This it is hoped will also talk back when asked pertinent questions 
about status and axis position. This would allow parallel poll and 
position readout on the fly, if there is time. It would then be 
possible to control ten interfaces each with these three multi¬ 
plexed axes. It is a big bus with 30 wheels! 

USES 

As far as the PET is concerned this system would be useful in 
laboratory environment test systems or maybe hobbyist robots. 

For use in bad industrial environments the PET would probably 
suffer and a purpose designed system would be better. However, 
it may be borne in mind that the motors can be placed tens of 
meters from the drives with suitable cables, thus making it possible 
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to place the computer in a 


protected area. 


A.M. ROBERTSON 


Supplier: 


P.K.S. Designs Ltd., 
40 Nuffield Road, 
Poole, 

Dorset. 





OYTFK (UK) LtcL 


BflSTC TRAINI NG- COURSE 

This course is designed for busy people who neeyo^ite^ 

BASIC programmes now. Incomputer foncepts, you 
^rtafefto^rroih/rerfrou can wr!te useful commercial 
and technical programmes. 

The exercises which you try out immediately on the PET 
tSrquefiersffa?. y ^tos a iLedil?e e anr?re q uent .hands-on 

interruption. You will emerge possibly exhausted, 
programming, and with an excellent grasp of practical BASIC. 

Your course tutor is Mike Gross-Niklaus. Formerly a . 
training manager with ICL and now installing small business 
systems! Mike's ability to explain difficult concepts in 
simple terms and his deep understanding of the pro 
the inexperienced programmer have brought him well-earned 
recognition in the national computing press. 

For details contact:- 

CYTEK (UK) LTD 

12 Corn Exchange Hall, MANCHESTER 4. 

Telephone:- 06l 832 2977 
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D.A.M.S. Office Equipment Ltd. are manufacturing and 
distributing (amongst other add-ons) a joystick unit, specif¬ 
ically designed to fit on a PET. Since this is the first of 
its kind on general sale in the U.K. we decided to review 
it in the Newsletter. 

DAMS JOYSTICK UNIT 


The unit comes as a complete package and consists of the 
joystick box with appropriate connectors to plug into the 
PET and a tape with the subroutine for operating it. 

The hardware, which seems to be the simple part of the 
joystick takes its power from the second cassette port 
and gives its output to two of the data lines on the 8-bit 
User Port. This rather clever design enables up to four 
joysticks to be run from the port at the same time. 

The software required to operate the joysticks is in machine 
language and resides in the second cassette deck buffer. The 
position of any joystick can be read from a BASIC program by 
means of the USR function so that: 

A = USR (1) 

puts the value from joystick into A. Two short statements 

in BASIC can convert A into x and y co-ordinates which can then 
be plotted on the screen or used in calculations. The scaling 
of these co-ordinates is determined by the contents of a location 
in the program and hence can be changed over a wide range of 
values. 

Another variable in the program is the number of readings taken 
from the joystick and averaged to give the position. Broadly 
speaking the fewer readings taken the faster the BASIC program 
can be run. More readings however, will give improved stability 
at the price of slower operation. Once having connected the 
unit and loaded the routine the joystick is so easy to use that 
within minutes you can be adapting your favourite games for 
joystick control. Such an analogue input has more serious uses 
as well including: 

1) A system for drawing diagrams and charts quickly 

2) Moving a pointer or "highlighter" around the screen for 
editing information. 

3 ) A computer version of microfiche storage where PET's screen 
acts as a window on a large area of data, its position being 
controlled by the joystick. 

4) Continuously variable responses for use in psychology tests 
(a prominent area of use for PET). 

In inclusion then, the versatile design of this unit gives it a 
wide field of applications. Although at £25 the single joystick 
is somewhat pricey, this can probably be offset by the flexibility 
of the software and the expandability of the system. 


RICHARD PAWSON 



Programming 


One way of rendering the STOP key ineffective white running 
une w y . pr .xf F ^37 136 . This must be reset it tne 

!E^uris S OP^ P ed K or 5 cl6sEd and has the side effect of 

stopping TI and TI$. 


* 


* 


* * * 


Some users have experienced difficulty arising exi ^ n 9 

sSch^e following: 


10 FOR I = 1 TO 10 
20 A = FNZ(I) 

30 IF A > 15 THEN RETURN 
40 NEXT I 


This sort of 
later in the 
of the above 


routine can result in NEXT WITHOUT FOR errors 
program. The following is the correct version 

subroutine: 


10 FOR I = 1 TO 10 
20 A = FNZ(I) 

30 IF A > 15 THEN 1=10 
40 NEXT I: RETURN 


* 


* 


* * * 


If you want to handle a large data structure such as am array 
with more than 256 elements, lower the top of BASIC with 0 
1 oc i a This is the most significant byte of tne top ox 

BASIC * address and will make you PET look like a 4K machine. 
The top of memory is then available for.PEEKing and POKE g 
according to any address system you devise. 


* * * 


* 


* 


A useful trick when de-bugging very long programs 1S , 

59490,60. This doubles the listing speed. To revert to normal 

speed POKE 59490,30. 



MICRODIARY 

By Julian Allason of PETSOFT 


Amongst the daily mountain of post from PET users there are always 
a number of request for programs not carried in the current PETSOFT 
catalogue. These enquiries are logged, and if there seems to be a 
genuine demand we set about writing a program to match. 

One regularly requested title was an Appointment Diary routine. 

In fact there are several versions published in America; none seemed 
suitable so I set about preparing a specification. Clearly it should 
use PET's excellent graphics and reverse field facility to display 
a full week on the screen. Looking at a number of Desk diaries, 
we decided that the format adopted by the Economist was the most useful. 

The program should ask todays date and from that calculate the 
correct date for each weekday in the present week and print that on 
the screen too. That would be relatively easy, I thought. But it 
was vital that the program stored layouts not just for the present 
week, but for several weeks ahead, so that they could be recalled 
and easily amended. 

This was the nub of the problem. The program might be used by 
secretaries with no PET experience; I could not therefore use data 
tapes or any method which required more effort than writing up an 
ordinary diary. It would all have to be done by menu selection, that 
is to say pressing a single key from a choice offered to select the 
particular option required. 

I started by experimenting with a subroutine which would print 
a line number, a question mark (shorthand for PRINT), and quotation 
mark down the left hand side of the screen, using the following method: 

100: B=200 :REM SETS NEW LINE NUMBER STARTING POINT 

110 FOR A= 1 TO 11 :REM 22 LINES OF SCREEN DISPLAY TO BE 

STORED (EXCLUDING MENU ON BOTTOM THREE 
LINE) 

120 POKE 245, Y:PRINT "<!>?"; B;CHR$(34): REM THE POKE COMMAND 

ISSUED AS A VERTICAL TAB. CHR$5 (34) IS THE 
QUOTE MARK 

130 B=B+10 REM: INCREMENTS LINE NUMBER 

140 NEXT A 

This printed the line number, one position in from the left (position 
TAB(l)) on account of PET's habit of printing a blank before positive 
numbers. A Cursor Left would solve this difficulty in all positions 
except HOME; there is no position to the left of HOME? A little 
Poking took care of this. 

The disadvantages of this method were twofold. Firstly it 
sacrificed seven precious print positions from the layout of the 
week: five for the line number etc.to be printed and two at the end. 
Secondly it required human intervention to hit Return eleven times 
to include the new lines in the program, and once to execute a GOTO 
which would restart it. 


Cont/ 




Cont/ 
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There was a solution to the second ca *“e°dlne using the 

posssible to Poke ^Mr. ™ ^ r ' e f ihe number of keystrokes 

keyboard b ““® r ^ h ““°a y b y°a GET or INPUT. Poking a 0 into i 
hit since last cne^eu 

the counter. 


unter. . Poke locations 

The buffer can count up to ten keystrokes, ^so ^ ^ wlll execute 

S^^rjSsjSs = 


lation win o unsettling effect on 

Unfortunately the addition “^^liution was to display their 

r^li, one of the auto-Keturns, to get 

them back into memory. 


iiil'-' ■> lost 

A further side ef:feet’” s b th y‘e^g r »ith I 'Go8«bs altogether, 
although this could be avoided by „« blaok co ffee and wondering 

H Sfttfnrwo^d nofbfa^ore^greeable pastime. 


n. pp fhe new lines were included 
A further difficulty arose^ On called and displayed, but 
in the program they could be selects nn J tion (TAB (0)) leaving no 
they were printed from the -leftmost POBiti^ modiiica tion was 

required S/ered. themselves; treating each linens 


This approach was beginning to look a little inelegant, 
abandoned*^ Maybe there was another method. 


^ • -a' . 

1t is so useful that I would like to share it 
There was, and it is so 

with you. 


uu. 

PEEKING and POKING scare the daylights out of many first ti 
computer users. They needn't. 


.. j _ t op a t ion and has a number. 
Each part of the memory ° a lg actually in that particular 

By PEEKING that number you ? a ” * loca tions are 32768 to 33767, 

-r^er SoES or HOME, and the l a «er, bottom 

right 


The routine I have developed ^oks^at^each that^character - in 

PEEKing it. This give 8 .the simply use ^ t o turn the POKE 

n^bef back Uo a character, right? 


, v, t dpt differ from standard ASCII codes. 
Wrong! The numbers used by returns the PET's PEEK code. CHR 

So a conversion is necessary. hich may be the same, 64 or 128 more o 

relfthanPE? frS SSSsv^s 5020 to 5028 implement the conversion. 
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5000 REM***PAGE PEEK ROUTINE****** 

5006 F0RSC!RN=327 6 8T03 3727 
5010 PK=PEEK(SCRN) 

5020 IFPK<32THENPK=PK+6*:OOTO 503 O 

5022 IFPK>64ANDPK<96THENPK=PK+128: OOTO50.30 

5023 IFPK>95ANDPK<127THENPK=PK+6^:OOTO503^ 
5025 IFPK>127ANDPK<160THFNPK=PK-f4 : roTO503n 
5 02 7 IFPK>159>NnPK<l c ' 2THENPK=PK-12 8 : OOTO5030 
502 8 IFPK>22 3ANDPK<25 6THENPK=PK-6 4 

5030 CR$=CKR$(PK) 

5040 F=LEN(Y$) 

5042 IFF=240THENX=X+1 
5050 S$(X)=S$(X)+CR$ 

5060 Y$=S$(X) 

5070 NEXTSCRN 

5080 PRINTS$(0);S$(1);S$(2);S$(3) 


Once converted safely to the string CR$, the character can be added 
to the string S$(X). Note that a string cannot exceed 255 characters 
however. When string length reached 240, I started a new string. Four 
such strings will hold a whole screenful of information, including 
the graphics.: 

The strings can easily be recalled for amendment and manipulated 
if necessary. Since strings variables are not stored by SAVEing onto 
tape, it will be necessary to convert them to line numbers or DATA 
statements, by poking the buffer as suggested above. 

And what of the Appointments Diary program? It is selling rather 
well. 


Julian Allason. PETSOFT 




Users' Directory S. 

Announcements 


IttTEX (Datalog) LTD f *om black PVC and tailored to fit over 
for the PET. Made from black and attr active with a 

a pet, the dust cover «^ oth rugged and £4.95 inc . VAT 

white logo over the screen. The aiven a 10% discount. 

7+1%) although Users Club members are given a 

For further details or trade enquiries ring 

* 

A new version of e ^^ 3 e/br 0 MB e ELECTR 0 NICSrRiversidl, 

PAM has just f en T ^ tSeTor a 24K unit is £310 + 
Eynsford, Kent. ^ e c * s P ^e appare ntly available to plug 

in; 7 o 5 tSe r 8K! g i6K and 24K standard units. For further 
details ring: 0322 863567 

* 

The MICRO COMPUTER CENTRE are now marketing 

flexible business system using a PET printer are standard 

Extra RAM, twin floppies their Disk Maintenance 

options. The sof tw ™ h updates, moves and copies 

Facility Program, which c:^ssibleall forms of book-keeping, 
random files. This ^ es /° s r f t for a small to medium 

company: ™urih P e? y details or a quotation for your 
specific requirements contact. 

The Micro Computer Centre, Tel. 01-876 0524 
114 Upper Richmond Road VJest, 

East Sheen, 

London. SW14 


A PET to teletypewriter 33 interface is available from: 

Allen Computers, Tel. 0472-40568 
16 Hainton Avenue, 

Grimsby, 

South Humberside 

i nr User Port operation and machine 

llngSale^oSines^for usting. Standard price is E106.00 
inc. VAT (CWO). 



USERS' DIRECTORY - new entries 


Mr. S. Hartley, 

12 Linden Close, 

Woodcoes, 

Warwick. Tel Warwick 48735 

Systems analysis, business administration routines 


Wieland Hartwig, 

ACS - Applied Computer Systems, 

Steglitzer Damm 14, 

D-IOOO Berlin 41, 

GERMANY 

Small business software, consulting, turnkey systems 


Dr. Chris Smith, 

Dept. Physiology, Queen Elizabeth College, 

Campden Hill Road, 

London, W8 

Realtime data and laboratory computing. University teaching 

programs. 


David Williams, 

Dept. Biochemistry, Brunei University, 
Uxbridge, 

Middx. UB8 3PH 

Simulation in biology/biochemistry 


John D Rayner, 

Dept, of Computer Studies, University of Hull, Hull, 
HU6 7RX. 

Display of chemical formulae and structure diagrams 


Raymond d Crossdale 

William Reape Ltd. (Civil Engineers) 

Mayo House, 

Grantley Way, 

Wakefield 

Specialised applications software for small businesses 


Nicomtech Ltd, 

212 St. Stephens Road, 

Saltash, Cornwall PL12 4NL 

Radio amateur interface and software packages to transmit and 
receive morse and radio telex. 
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Please address any letters or comments to: 


The Editor, 

Pet Users Club, 
Commodore Systems, 
360 Euston Road, 
London, NWl 3BL. 


From Messrs S. Fairman and J Gerson, Brighton College, 

Eastern Road, Brighton. BN2 2AL. 

How to stop PET aborting when waiting f o r input and RETURN is hit 

The easy answer is to address the keyboard as device number^0 
and accept input from that device. The statement, which can 
be adapted as need be, is: 

OPEN 1,0 : INPUT # 1,X : CLOSE 1 


* * * * * * * 

From Mr. G. Dicker, 39 Bramall Court, Ring Cross Est. , Georges Rd 
London, N.7. 

With reference to the article on page 29 of issue no. 5: 

10 ? CHR$(PEEK(59227+PEEK(515))0R128*PEEK(516)) 

20 GOTO 10 

This will continue to print any character selected on the key¬ 
board, as long as the key is pressed. 

PEEK (515) returns the matrix co-ordinate of the key pressed. 

This is then added to 59227 which is the start of a table in 
"BASIC", and the resulting location is PEEKed. This returns 
the ASCII code. 
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